DEFINE OUTPUT PARAMETER prm1 AS CHAR NO-UNDO.
ASSIGN prm1 = "PCT".
RETURN "0".
